#pragma once
#include "Socket.hpp"
#include "Log.hpp"
#include <unordered_map>
using namespace MyLogModule;
using namespace MySocketModule;

#define NUM (sizeof(fd_set) * 8)
const int gdefaultfd = -1;

class SelectServer
{
private:
    std::unique_ptr<Socket> _listen_socket;
    int16_t _port;
    bool _isrunning;
    int _fd_array[NUM];
    unordered_map<string,string> dict;
public:
    SelectServer(int16_t port)
        : _port(port), _listen_socket(make_unique<TcpSocket>())
    {
        dict["hello"] = "你好";
        dict["apple"] = "苹果";

        for(auto e : dict)
        {
            cout << e.first << " " << e.second << endl;
        }
    }

    ~SelectServer()
    {

    }

    void AddDict(const string english,const string chinese)
    {
        dict[english] = chinese;
    }

    void Init()
    {
        _listen_socket->BuildTcpSocketMethod(_port);
        // 初始化辅助数组
        for (int i = 0; i < NUM; i++)
            _fd_array[i] = gdefaultfd;
        // 将listen_socket添加至辅助数组
        _fd_array[0] = _listen_socket->GetSockfd();
    }

    void Start()
    {
        _isrunning = true;
        // 读文件描述符集
        fd_set rfds;
        while (_isrunning)
        {
            // 在这里，如果没有连接，会进行阻塞。从listen_socket中获取连接，本质也是一种IO
            //  InetAddr client;
            //  int fd = _listen_socket->AcceptOrDie(&client);

            // 为了避免阻塞，使用select
            // 先将集合清零
            FD_ZERO(&rfds);
            // FD_SET(_listen_socket->GetSockfd(),&rfds);
            int fdmax = gdefaultfd;
            // 将对应的fd添加至读集合中
            for (int i = 0; i < NUM; i++)
            {
                if (_fd_array[i] != gdefaultfd)
                {
                    FD_SET(_fd_array[i], &rfds);
                    if (_fd_array[i] > fdmax)
                        fdmax = _fd_array[i];
                }
            }

            struct timeval timeout = {5, 0};
            int n = select(fdmax + 1, &rfds, nullptr, nullptr, &timeout);
            switch (n)
            {
            case 0:
                cout << "time out," << endl;
                break;
            case -1:
                cout << "select error" << endl;
                break;
            default:
                // rfds: 内核告诉用户，你关心的rfds中的fd，有哪些已经就绪了！！
                cout << "有事件就绪了,timeout:" << timeout.tv_sec << endl;
                Dispatcher(rfds);
                break;
            }
        }
        _isrunning = false;
    }

    void Accepter()
    {
        InetAddr client;
        // 此时accept就不会阻塞了
        int newfd = _listen_socket->AcceptOrDie(&client);
        if (newfd < 0)
            return;
        else
        {
            // 此时能直接read()读了吗？
            // 连接虽然建立了，但是人家不给你发数据，比read时不还是要阻塞吗？
            // 所以，需要将刚刚建立的连接，添加托管到select中的readfds中管理
            // 如何托管呢？使用辅助数组记录要关心的fd
            cout << "get a new link,fd:" << newfd << client.getInfo() << endl;
            int pos = -1;
            for (int j = 0; j < NUM; j++)
            {
                if (_fd_array[j] == gdefaultfd)
                {
                    pos = j;
                    break;
                }
            }
            if (pos == NUM)
            {
                cout << "服务器满载了..." << endl;
                close(newfd); // 关闭新连接
            }
            else
            {
                _fd_array[pos] = newfd; // 关心是否可读
            }
        }
    }

    void Recver(int who)
    {
        char buf[1024];
        size_t n = recv(_fd_array[who], buf, sizeof(buf) - 1, 0);
        if (n > 0)
        {
            buf[n] = 0;
            // cout << "Client# " << buf << endl;
            // string str = "Echo#";
            // str += buf;
            // send(_fd_array[who],str.c_str(),str.size(), 0);   //bug

            //实现英汉互译
            string target = buf;
            //1234\n\0
            target = target.substr(0,target.size() - 2);
            cout << target << endl;
            string result;
            if(dict.find(target) == dict.end())
            {
                result = "None";
            }
            else
            {
                result = dict[target];
            }
            result += "\n";
            send(_fd_array[who],result.c_str(),result.size(),0);

        }
        else if (n == 0)
        {
            LOG(LogGrade::DEBUG) << "客户端退出了,fd:" << _fd_array[who];
            close(_fd_array[who]);
            _fd_array[who] = gdefaultfd;
        }
        else
        {
            LOG(LogGrade::DEBUG) << "客户端读取出错了,fd:" << _fd_array[who];
            close(_fd_array[who]);
            _fd_array[who] = gdefaultfd;
        }
    }

    void Dispatcher(fd_set &rfds)
    {
        for (int i = 0; i < NUM; i++)
        {
            if (_fd_array[i] == gdefaultfd)
                continue;

            // 判断是否是listen_socket
            if (_fd_array[i] == _listen_socket->GetSockfd())
            {
                // 判断listen_socket是否在rfds中
                if (FD_ISSET(_fd_array[i], &rfds))
                {
                    Accepter();
                }
            }
            else
            {
                // 此时，不是listen_socket,而是普通fd就绪了
                // 可以读了，不用阻塞！
                if (FD_ISSET(_fd_array[i], &rfds))
                {
                    Recver(i);  //进行IO
                }
            }
        }
    }
};